home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 242 / 242.d81 / rolling waves (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2004-01-01  |  239 b   |  14 lines
  1. 30200 s=54272:forl=54272to54296:pokel,0:next:pokes+24,15
  2. 30210 pokes+6,240:pokes+4,129:pokes+1,34:pokes,75
  3. 30220 fora=1to15:pokes+24,a
  4. 30222 tq=ti
  5. 30224 ifti<tq+4then30224
  6. 30226 next
  7. 30230 forb=15to1step-1:pokes+24,b
  8. 30232 tq=ti
  9. 30234 ifti<tq+16then30234
  10. 30236 next
  11. 30240 tq=ti
  12. 30242 ifti<tq+300then30242
  13. 30250 goto30210
  14.